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Abstract 

Polymorphic regular types are tree-like datatypes gen¬ 
erated by polynomial type expressions over a set of free 
variables and closed under least fixed point. The ‘equal¬ 
ity types ’ of Core ML can be expressed in this form. Given 
such a type expression T with x free, this paper shows a 
way to represent the one-hole contexts for elements of x 
within elements of T, together with an operation which 
will plug an element of x into the hole of such a context. 
One-hole contexts are given as inhabitants of a regular 
type d x T, computed generically from the syntactic struc¬ 
ture ofT by a mechanism better known as partial differ¬ 
entiation. The relevant notion of containment is shown to 
be appropriately characterized in terms of derivatives and 
plugging in. The technology is then exploited to give the 
one-hole contexts for sub-elements of recursive types in a 
manner similar to Huet’s ‘zippers’[Hue97]. 


1 Introduction 

Gerard Huet’s delightful paper ‘The Zipper’ [Hue97] de¬ 
fines a representation of tree-like data decomposed into a 
subtree of interest and its surroundings. He shows us in¬ 
formally how to equip a datatype with an associated type 
of ‘zippers’—one-hole contexts representing a tree with 
one subtree deleted. Zippers collect the subtrees forking 
off step by step from the path which starts at the hole and 
returns to the root. This type of contexts is thus indepen¬ 
dent of the particular tree being decomposed or the sub¬ 
tree in the hole. Decomposition is seen not as a kind of 
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subtraction, an operation inherently troubled by the need 
to subtract only smaller things from larger, but as the in¬ 
version of a kind of addition (see figure 1). 



Figure 1: a tree as a one-hole context ‘plus’ a subtree 

This paper exhibits a similar technique, defined more for¬ 
mally, which is generic for a large class of tree-like data 
structures—the ‘regular datatypes’. These are essentially 
the ‘equality types’ of core ML, presented as polynomial 
type expressions closed under least fixed point. In partic¬ 
ular, I will define and characterize two operations: 

• on types, computing for each regular recursive 
datatype its type of one-hole contexts; 

• on terms, computing a ‘big’ term by plugging a 
‘small’ term into a one-hole context. 

The first of these operations is given by recursion on the 
structure of the algebraic expressions which ‘name’ types. 
As I wrote down the rules corresponding to the empty 
type, the unit type, sums and products, I was astonished 
to find that Leibniz had beaten me to them by several cen¬ 
turies: they were exactly the rules of differentiation I had 
learned as a child. 
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1.1 Motivating Examples 


btree' = 2xbtree 


How can we describe the one-hole contexts of a recur¬ 
sive type? Huet suggests that we regard them as journeys 
‘backwards’ from hole to root, recording what we pass by 
on the way. I propose to follow his suggestion, except that 
I will start at the root and work my way ‘forwards’ to the 
hole. Both choices have their uses: ‘backwards’ is better 
for ‘tree editing’ applications, but the ‘forwards’ approach 
is conceptually simpler. 

Consider such journeys within binary trees: 

btree = leaf | node btree btree 

At each point, we are either at the hole or we must step 
further in—our journey is a list of steps, list btree' for 
some appropriate step type btree', but what? At each 
step, we must record our binary choice of left or right, 
together with the btree we passed by. We may take 

btree' = bool x btree 

We can define the ‘plugging in’ operation + as follows 1 

s € btree' t g btree 
s <t e btree 

(true,r)<f i->- nodefr 
(false, l)<t i-» nod elt 

ss € list btree' t € btree 
ss + 1 e btree 

[] +1 i-> t 

(s::ss)+t i-> s<(ss+t) 

We might define btree more algebraically as the sum 
(i.e. ‘choice’) of the unique leaf with nodes pairing two 
subtrees—powers denote repeated product: 

btree = 1 + btree 2 

Correspondingly, we might write 

*Huet would write (s :: ss) + t i-» ss + (s <t) 


Now imagine similar journeys list ttree' for ternary 
trees: 

ttree = 1 + ttree 3 

Each step chooses one of three directions, and remembers 
two bypassed trees, so 

ttree' = 3 x ttree 2 

It looks remarkably like the type of steps is calculated by 
differentiating the original datatype. In fact, this is exactly 
what is happening, as we shall see when we examine how 
to compute the description of the one-hole contexts for 
regular datatypes. 


2 Presenting the Regular Types 

In order to give a precise treatment of ‘differentiating a 
datatype’, we must be precise about the expressions which 
define them. In particular, the availability of fixed points 
requires us to consider the binding of fresh type variables. 
There is much activity in this area of research, but this is 
not the place to rehearse its many issues. The approach 
I take in this paper relativizes regular type expressions to 
finite sequences of available free names. I then explain 
how to interpret such expressions relative to an environ¬ 
ment which interprets those names. 

I choose to give inductive definitions in natural deduc¬ 
tion style. Although this requires more space than the 
datatype declarations of conventional programming lan¬ 
guages, they allow dependent families to be presented 
much more clearly: even ‘nested’ types [BM98, BP99] 
must be defined uniformly over their indices, whilst the 
full notion of family allows constructors to apply only 
at particular indices. I also give type signatures to de¬ 
fined functions in this way, preferring to present the uni¬ 
versal quantification inherent in their type dependency via 
schematic use of variables, rather than by complex and in¬ 
scrutable formulae. 
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2.1 Sequences of Distinct Names 

Let us presume the existence of an infinite 2 set Name of 
names, equipped with a decidable equality. We may think 
of Name as being ‘string’. The set NmSeq may then be 
defined to contain the finite sequences of distinct names. 
Each such sequence can be viewed ‘forgetfully’ as a set. 

E g NmSeq 

Name G Set Eg Set 

_ S g NmSeq x g Name x S 

e G NmSeq E;a;G NmSeq 

I shall always use names in a well-founded manner. The 
‘explanation’ of some name x from some sequence E will 
involve only ‘prior’ names—intuitively, those which have 
already been explained. It is therefore important to define 
for any such pair, the restriction E [x, being the sequence 
of names from E prior to x. 

S g NmSeq igS 
E [x G NmSeq 

S; a; fa: i-> E 
T,-,(y\x)lx ^ H[x 

As equality on names is decidable, I shall freely allow 
names to occur nonlinearly in patterns. In order to re¬ 
cover the disjointness of patterns without recourse to pri¬ 
oritizing them, I introduce the notation y\x to mean ‘any 
y except x\ Correspondingly, each clause of such a defi¬ 
nition holds (schematically) as an equation. I nonetheless 
write i-> to indicate a directed computation rule, reserving 
= for equational propositions. 


2.2 Describing the Regular Types 

The regular types over given free names, or rather, the ex¬ 
pressions which describe them are given by the inductive 


family Reg E in figure 2. Firstly, we embed 3 type vari¬ 
ables E in Reg E, then we give the building blocks for 
polynomials and least fixed point. 

E g NmSeq 

Reg S g Set 

X G S 

x g Reg S 

_ S,T g RegS 

0 g Reg E S + Tg Reg E 

S,T g Reg E 
1 g RegS SxT g RegE 

F g Reg S; x 
px.F g Reg E 

F g RegS ;x S g RegS T g RegS 
F\x=S g Reg E T x g RegE; ^ 

Figure 2: descriptions of regular types 

The last two constructors may seem mysterious. How¬ 
ever, the redundancy they introduce will save us work 
when we come to interpret these descriptions of types. 
We could choose to interpret only Reg e, the closed de¬ 
scriptions, keeping the open types underwater like the 
dangerous bits of an iceberg. This would require us to 
substitute for free names whenever they become exposed, 
for example, when expanding a fixed point. We would in 
turn be forced to take account of the equational properties 
of substitutions and prove closure properties with respect 
to them. I dispense with substitution. 

The alternative I have adopted is to interpret open descrip¬ 
tions in environments which explain their free names. The 
two unusual constructors above perform the roles of defi¬ 
nition and weakening, respectively growing and shrinking 
the environment within their scope. Definition replaces 
substitution and weakening adds more free names without 
modifying ‘old’ descriptions. This avoids the propagation 
of substitutions through the syntactic structure and hence 
concerns about capture—we shall only ever interpret the 
‘value’ of a variable in its binding-time environment. 


2 By ‘infinite’, I mean that I can always choose a fresh: 
i create a new binding. 




3 In fact I am abusing notation by suppressing a constructor symbol. 



2.3 Type Environments 


A type environment for a given name sequence £ asso¬ 
ciates each x in £ with a type description over the prior 
names, £ [x. 


£ € NmSeq 
Env £ e Set 

e e Env e 

£; a; e NmSeq TeEnv£ 5 eReg£ 

T;x=S S Env£;x 


r c Env £ T e Reg £ 

r [T] e Set 


t ertx|r- 
t e r [x] 


it 


s&risj 
ini s e r [S + T] 


t € r fri 
inrf e r[5 + T] 


0 e r [ij 


5 € r [si ter 

<s;t) e r [SxT 


p 


t e r |F|x=/<x. FI 

con ter F] 


t e T; x=5 [j 
f e T {F\x-. 


n term 

TTr^sWJ 


We may equip environments with operators for restriction 
(extracting the prefix prior to a given name) and projection 
(looking up a name’s associated type description), r [x is 
the environment which explains the free names in T ■ x. 


Figure 3: the data in regular types 

2.5 Examples of Regular Types 


r e Env £ x e £ r e Env £ x e £ 

r (x e Env £ [x r ■ a; e Reg £ (a; 


r; £=5 [x ^ r 

T-{y\x)=S[x H- Tlx 


r ; x =s ■ x i-> s 

T;(y\x)=S-x i-> r ■ x 


Let us briefly examine some familiar types in this setting. 
We have the unit type 1, so we can use + to build the 
booleans: 

bool !->• 1 + 1 (e Reg £, any £) 

true i->- ini () (e T [bool] , any T) 

false i-> inr () (e T [bool], any T) 


2.4 Interpreting the Descriptions 

Now that we have the means to describe regular types, 
we must say which data are contained by the type with 
a given description, relative to an environment explaining 
its free names—we must give a semantics to the syntax. 
Figure 3 defines the interpretation T [T] inductively. 4 

Note that I have not supplied constructor symbols for the 
embedding rules corresponding to variable-lookup, def¬ 
inition and weakening. These apparent conflations of 
types, e.g. T: x=S [^] with T [S'] , are harmless, as the 
types tell us which embeddings are operative. 


4 The ‘semantic brackets’ do not represent a meta-level operation; 
they are intended to be a suggestive object-level syntax for a dependent 
family of types. 


We may use p to build recursive datatypes like the natural 
numbers and our tree examples, again for any £ and T, as 
a fresh bound variable (x below) can always be chosen: 

nat i-» px. 1 + x 
zero i-> con (ini ()) 
sue n i-» con (inr n) 

btree i-» px. 1 + xxx 
bleaf con (ini {)) 
bnode / r i-> con (inr (/; r)) 

ttree >->• px. 1 + £X (zxa;) 
tleaf i->- con (ini ()) 
tnodeZmr i-> con (inr (Z; (m; r))) 
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We may use weakening to define an operation which com¬ 
putes list types: 

list T i-> fix. 1 + 21x xx 
nil i->- con (ini ()) 
xv. xs i-> con (inr (x-, xs)) 

The finitely branching trees may thus be given by 

ftree i-> fix. list x 
fnode ts i-» con ts 


The effect of local type variables is thus reflected at their 
place of binding, rather than at their places of use. 5 

The significance of the phrase ‘accounted for by the re’s 
in T’ is shown by this simple example: 

If we take T = e-x=boo\;y=x 
we can derive true <% xy (true; false) 
but not false <%* y (true; false) 

The point is that false has type x on account of the x in 
this particular T’s definition of y, whereas, irrespective of 
T, we can always derive 


2.6 Subterm Orderings for Regular Types 

Let us now define an inductive relation, u < J t for u £ 
T [a;] and teT [T], characterizing the subterms of a term 
in T accounted for by x’s in T. This relation characterizes 
T’s role as a container of x’s. I omit the obvious ‘well- 
formedness’ premises. 

u e r fx] 

u<%u 

u<f s u <x t 

w<f +T inls n<f +T inrt 


i <% Xy (s;t) 

However, discharging the definition of y in our example: 
Taking T = e; X'=bool 

we can derive true <% xy ^ y ~ x (true; false) 
and false <® x »lw = * (true; false) 

Both x’s are accounted for by the indicated type, and the 
derivations follow respectively by the two definition rules. 

A similar phenomenon occurs if we try to specialize this 
ordering to the x’s contained by a list x, that is, to deter¬ 
mine when 

, +x xy 

t < x v ts 


U <% S 

u <% x '* (s;t) 


n<p 


(s;t) 


Only the rule for fixed points applies, showing this derived 
rule to be complete: 


t< n+^xy)ly^y.1+, y xy ^ 

t <“ st "con tts 


1<U 


< S X S S 

u <F\y=s 


<*t 

t 



Observe that subterms accounted for by an a; in a compos¬ 
ite type are characterized by a rule for each component of 
that type. In particular, the rules for a definition F\y=S 
find subterms due to x’s in F and x’s in S respectively, 
the latter occurring within sub terms due to y’s in F. Note 
that the latter rule exploits the fact that we may see s as 
inhabiting both T [5] and T:y=S [;y]. 


The premise can only be further simplified by the defini¬ 
tion rules: the direct rule finds only the head of the list in 
x\ the indirect rule’s second premise finds only the tail in 
y, and the first demands that we search for an x within that 
tail. We thus derive (and show complete) the two rules we 
might have hoped for: 

5 It would be interesting to investigate a notion of subterm with a 
single rule for definitions capturing ‘tc-subterms within F-term t, re¬ 
membering that y really means S’: however, we would pay with extra 
complexity in the rule for variables, and with the need to carry extra 
environmental information explicitly. 
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_ t <\ lst x ts 

t <?* st x (t:: ts) t <“ st x (s :: ts) 

We may exploit this ‘containment’ relation to define the 
usual subterm relation for recursive types, namely <fi X .F 
for T {fix. F], as follows: 

U <fj,x.F £ £ ~x t 

U<ixx.FU U < ftx. p COUt 

That is, to find a subterm of conf e T [ py. F], either stop 
where you are, or move down one level to an x contained 
by F and repeat. < x cannot go further than one level, 
because x is free in F\ 

With a little work, we can specialize these rules for btree 
to 


t < btree t 


t <btree (bnode l r) t <btree (bnode l r) 


3 One-Hole Contexts 

Let us now turn to the generic representation of one-hole 
contexts for recursive regular types. We shall first need to 
see what ‘one step’ is. 

The immediate recursive subterms in some con t of 
type T l/ix. F] are those subterms of t which correspond 
to the occurrences of x in F —recall that t has type 
T: x=[ix. F [F], We therefore need to describe the one- 
hole contexts for x’s in F’s. Since F may itself contain 
fixed points, the primitive operation we need to define will 
compute for F the type of one-hole contexts for any of its 
free names. This operation is exactly partial differentia¬ 
tion. 


3.1 Partial Differentiation 

The partial derivative of a regular type description T with 
respect to a free name x is computed by structural recur¬ 


sion over the syntax of T. 6 It is defined in figure 4. 


d x x 

x e E T e Reg £ 
d x T e Reg £ 

1 

d x (y\x) 

1 ^ 

0 

d x 0 

1 ^ 

0 

dx(S+T) 

1 ^ 

d x S + d x T 

d x \ 

1 ^ 

0 

dx(SxT) 

1 ^ 

d x SxT + Sxd x T 

dx(ny.F) 

1 ^ 

pz.d x F\y=py.F + 

d x (F\y=S) 

1 ^ 

d y F | y=py. F xz 
d x F\y=S + d y F\y=Sxd x S 

dzT* 

!->• 

0 

d x T yV 

!->• 

d x T 

——V 

Figure 4: partial differentiation 


The first six lines are familiar from calculus. For one-hole 
contexts, they tell us that 

• ana: contains one x in trivial surroundings 

• ay other than x contains no x 

• constants contain no x 

• we find an x in an S + T in either an S or a T 

• we find an x in an S x T either (left) in the S, passing 
the T, or (right) in the T passing the S 

Note that partial differentiation is independent of environ¬ 
ments: it is defined on the syntax of types alone. Just like 
the subterm ordering, it takes no account of the possibil¬ 
ity that some y might, for some T, expand in terms of x. 
However, partial differentiation is the basic tool by which 
total differentiation is constructed, and this is exactly what 
we need when we go under a binder and become liable to 
encounter local names which potentially do conceal Fs. 

The rule for definitions again handles local variables at 
their place of binding, summing the types of contexts for 

6 It is depressing how few mathematics teachers deign to impart this 
vital clue to calculus students, giving them rules but no method. I learned 
dnrerenuation from the pattern matching algorithm given in [McB70]. 
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x’s occurring directly in F, and indirectly in an S buried 
within a y. In conventional calculus, this is effectively the 
‘chain rule’ extended to functions of two arguments 

&/(«> b ) = + &/(«>«) 
in the special case where a is x. 

Once we know how to differentiate definitions, we can 
make the leap to fixed points. If we expand the fixed point 
and apply the ‘chain rule’, we obtain: 

dx(»y.F) = d x (F\y=ny.F% 

= d x F \y=yy. F + 

d y F \y=/iy. F x d x {(iy. F) 

It is tempting to solve this recursive equation with a least 
fixed point, but does this give the correct type of one-hole 
contexts? Yes: every x inside a ny. F must be a piece of 
‘payload data’ attached to some y-node buried at a finite 
depth. Hence our journey takes us either to an x at the 
outermost node and stops—hence the d x F in the ‘base 
case’—or to a subnode and onwards—hence the d y F in 
the ‘step case’: it must stop eventually. We must weaken 
at z, for z is not free for F. Our journey is clearly linear: 
the body of the fixed point is syntactically linear in 2 . In¬ 
deed, the following set isomorphism holds, showing that 
our journey is a list of ‘steps’ with a ‘tip’: 

r [ tiz.T z + S z xz] & r [(list S)xTj 

The rules for differentiating an explicit weakening simply 
short-circuit the process if the name we seek is that being 
excluded. 

3.2 Examples of Derivatives 

Before we develop any more technology, let us check that 
partial differentiation is giving us the kind of answers we 
expect. Of course, the types we get back will contain lots 
of ‘0+’ and ‘lx’, but the usual algebraic laws which sim¬ 
plify such expressions hold as set isomorphisms. It is also 
not hard to show that a recursive type with no base cases 
is empty: 


IfT [F|*=0] = 0 then T fox. F] M 0 

Writing T” for the n-fold product of T’s and n for the 
sum of n 1 ’s, we can check (by induction on n ), that for 
n > 0 

T ld x x n \ = nxx n 1 

Viewed as a one-hole context for x n , the n tells us which 
x the hole is at, while the x n 1 records the remaining x’s. 

A more involved example finds an x within a list of x’s 

enlist x = d x (nyA + xxy) 

= yz. (d ffi (1 + xx 2 /))|g/=listx_ + 

(d y ( 1 + xxj/))| 2 /=list x xz 
= /xz.yjy=listx + x|j/=list xxz^ 

= (list x) x (list x) 

We would indeed hope that a one-hole context for a list 
element is a pair of lists—the prefix and the suffix! 

Amusingly, the following power series resembles list x, 

1 + x + x 2 + x 3 + ■ ■ • = (f or |a;| < 1 ) 

and conventional calculus tells us that 



3.3 Plugging In 

Given a one-hole context in d x T and an x, we should be 
able to construct a T by plugging the x in the hole. That 
is, we need an operation which behaves thus: 





C e r[ d x r\ Iiery 

c {T<z} u e riTj 


() {^<^1 u 
inlc {S + T<x} u 
inrc {S + T<x} u 
ini (c;t) {SxT<x} u 
inr (s; c) {SxT<x} u 
con (ini c) {/ xy.F<x} u 
con (inr (c; cs)) {py.F<x} u 
ini c {F\y=S<x} u 
inr ( c y \c x ) {F^Sce} u 


ini (c {S<x} u) 
inr (c {Tec} u ) 

(c {5<x} u;t) 

{s;c {T<x} u) 

con (c {.Fee} u) 

con (c {F<y} (cs {y,y.F<x} u)) 

c {F<x} u 

c v i F <y} i c x {Sec} u) 
c {T<x} u 


Figure 5: plugging in 


How are we to define this operation? T should tell us the 
shape of the term we are trying to build; c should tell us 
which path to take and also supply the subterms corre¬ 
sponding to the ‘off-path’ components of pairs. In effect, 
the operation proceeds by structural recursion on c, but its 
flow of control involves a primary case analysis on T. Of 
course, we need only consider cases where d x T is not 0. 
The definition is in figure 5. 


3.4 Subtrees in Recursive Regular Types 

The d x operation picks out x’s from containers for x’s. As 
suggested above, this gives us the tool we need to pick out 
subtrees from our tree-like recursive datatypes, interpret¬ 
ing t as a container for the immediate subtrees of con t. 
Hence our intuition that contexts for recursive type T in¬ 
habit list T' can be made rigorous. The ‘step type’ for 
trees in px. F is 


d x F \x=px. F 


px.F g Reg S 

sub px. F e Reg S 

sub px.F i->- list (d x F \x=px. F) 
Informally, an inhabitant of sub px. F looks like 



A few brief calculations reassure us that 


T [sub (list a;)] 
hence T [sub (sub px.F)} 
T [sub btree] 
T [sub ttree] 
T [sub ftree] 


r [list x] 

T [sub px. F] 

T [list (2 x btree)] 

T [[list (3xttree 2 )]] 
T [[list (list ftree) 2 ]] 


The one-hole contexts for px. F thus inhabit sub px. F 
given by 7 


The corresponding notion of ‘addition’ has the signature 

cs £ T [sub px. FI Mgr \px. F] 
cs \x.fu e r [px. F] 


7 Abuse of notation— sub is really an operation on F 





For the ‘cs’ depicted above and an appropriate ‘it’, we 
expect cs + liX ,p u to be 



Of course, + MX p is defined by iterating {Fee} over the 
list 8 : 

(c :: cs) \ x F u i-A con (c {Fee} (cs + flx F u)) 

Observe, for example, that 4^ at really behaves like ‘plus’, 
whilst -lj ist x is effectively ‘append’. It is not hard to show 
in general that sub px.F is a monoid under ‘append’ and 
that + llx _ F is an action of that monoid on px. F. 

3.5 Subterms and Derivatives 

The relationship between the containment orderings and 
derivatives is an intimate one, and so too is that between 
the subtree orderings and the types computed by sub. In 
effect, the containment ordering is exactly that induced 
by plugging in, while the subtree ordering on fix. F is in¬ 
duced by +n X .p. What we have done is to give a concrete 
representation for the witnesses to these relational prop¬ 
erties. We may prove the following theorems: 

Theorem (containment) 

For u € T [a;] and t € T [T]: 
u < x t 3c e T [SzT]. c {T<x} u = t 

Theorem (subtree) 

For u,te T l/j,x. F]: 

U <!XX. F 3cs e T [sub (XX. F] . CS+p X F u = t 

The proofs of these theorems are easy inductions, on 
derivations for the =t- direction, and on the structure of 
8 Again, Huet would write 

(c::cs)+ llx , F u ->• cs \ x , F (con (c {f<i} «)) 


c or cs for the -4= direction. It is moreover the case that 
distinct c’s or cs’s on the right give rise to distinct deriva¬ 
tions on the left, and vice versa. I omit the details for 
reasons of space. 


4 Towards an Implementation 

Recent extensions to the Haskell type system, such as 
Jansson and Jeuring’s PolyP have begun to realise the 
potential of generic programming for the development 
of highly reusable code, instantiable for a wide class of 
datatypes and characterised by equally generic theorems 
[JJ97, BJJM98]. However, these systems show no sign of 
allowing operations like d x which compute types gener- 
ically by recursion over a closed syntax of type expres¬ 
sions, crucially regarding type variables as concrete ob¬ 
jects. 

In a dependent type theory supporting inductive families 
of datatypes [Dyb91], syntaxes such as Reg S can be rep¬ 
resented as ordinary data which can then be used to index 
the families like T [T] which reflect them. d x becomes 
merely an operation on data, requiring no extension to 
the computational power of the theory. A programming 
language based on such a type theory, as envisaged in 
[McB99], would seem to be a promising setting in which 
to implement the technology described in this paper. This 
work is well under way in the Computer-Assisted Reason¬ 
ing Group at Durham. 

The payoffs from such an implementation seem likely to 
be substantial, extending far beyond applications to edit¬ 
ing trees. A library of generic tools for working with con¬ 
texts would allow us to define functions in terms of these 
higher-level structures, manipulating data in large chunks, 
rather than one constructor at a time. Furthermore, in a 
dependently typed setting, a richer structure on data is 
ipso facto a richer structure on the indices of datatypes. 

It also seems highly desirable to extend the class of 
datatypes for which one-hole contexts can be manipulated 
generically beyond the regular types, perhaps to include 
indexed families themselves. A concrete representation 
of one-hole contexts for a syntax with binding has much 
to offer both metaprogramming and metatheory. 
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5 Conclusions and Future Work 


This paper has shown that the one-hole contexts for ele¬ 
ments contained in a polymorphic regular type can be rep¬ 
resented as the inhabitants of the regular type computed 
from the original by partial differentiation. This technol¬ 
ogy has been used to characterize data structures equiv¬ 
alent to Huet’s ‘zippers’—one-hole contexts for the sub¬ 
trees of trees inhabiting arbitrary recursive types in that 
class. The operations which plug appropriate data into 
the holes of such contexts have also been exhibited. 

While this connection seems unlikely to be a mere coinci¬ 
dence, it is perhaps surprising to find a use for the laws 
of the infinitesimal calculus in such a discrete setting. 
There is no obvious notion of ‘tangent’ or of ‘limit’ for 
datatypes which might connect with our intuitions from 
school mathematics. Neither can I offer at present any 
sense in which ‘integration’ might mean more than just 
‘differentiation backwards’. 

One observation does, however, seem relevant: the syn¬ 
tactic operation of differentiating an expression with re¬ 
spect to x generates an approximation to the change in 
value of that expression by summing the contributions 
generated by varying each of the re’s in the expression in 
turn. The derivative is thus the sum of terms correspond¬ 
ing to each one-hole context for an x in the expression. 
Perhaps the key to the connection can be found by fo¬ 
cusing not on what is being infinitesimally varied, but on 
what, for the sake of a linear approximation to the curve, 
is being kept the same. 

Apart from the implementation of this technology, and 
the development of a library of related generic utili¬ 
ties, this work opens up a host of fascinating theoretical 
possibilities—one only has to open one’s old school text¬ 
books almost at random and ask ‘what does this mean for 
datatypes?’. 

There must surely also be a relationship between this 
work and Joyal’s general characterization of ‘species of 
structure’ in terms of their Taylor series[Joy87]. For reg¬ 
ular types, d^T makes a hole for a second a; in a one-hole 
context from d x T. More generally, <9”T gives all the n- 
hole contexts for x’s in T’s in each of the n\ orders with 
which they can be found. This strong resonance with Tay¬ 


lor series seems worthy of pursuit and is an active topic of 
research. 

In summary, the establishment of the connection between 
contexts and calculus is but the first step on a long road— 
who knows where it will end? 
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